;**
;**	POINTS.SH -- Global Header for points flags and point values
;**
;**	LSL5:  Passionate Patti Does A Little Undercover Work
;**				Copyright 1991
;**				by Al Lowe
;**
;**	Last Update:	September 9, 1991
;**


(define	ptsPutOnBra						5)		;	patti.sc
(define	ptsTakeOffBra					-5)	;	patti.sc
(define	ptsPluggedInCharger			8)		;	charger.sc
(define	ptsPutCorderInCharger		3)		;	charger.sc
(define	ptsUnpluggedCharger			1)		;	charger.sc
(define	ptsWoreDoily					8)		;	inventry.sc
(define	ptsReadMagazine				5)		;	inventry.sc
(define	ptsOpenedFolderMM				1)		;	inventry.sc
(define	ptsOpenedFolderLL				1)		;	inventry.sc
(define	ptsOpenedFolderCC				1)		;	inventry.sc
(define	ptsTapeIntoCamcorder			4)		;	inventry.sc
(define	ptsStartedCamcorder			4)		;	inventry.sc
(define	ptsOpenedDayTrotter			11)	;	inventry.sc
(define	ptsInsertedDataPak			7)		;	inventry.sc
(define	ptsLookedBra					2)		;	inventry.sc
(define	ptsLookInFolder				4)		;	inventry.sc
(define	ptsGotDocNum					1)		;	inventry.sc
(define	ptsGotKrapCode					1)		;	inventry.sc
(define	ptsDrankWater					1)		;	rm160
(define	ptsSawTitty						1)		;	rm160
(define	ptsTookPot						1)		;	rm160
(define	ptsGotCamcorder				1)		;	rm160
(define	ptsSterilizedHands			1)		;	rm170
(define	ptsHeard8track					5)		;	rm170
(define	ptsGotCharger					8)		;	rm170
(define	ptsGotVideotapes				6)		;	rm170
(define	ptsDegaussedTapes				2)		;	rm170 max 6
(define	ptsGotAeroDorkCard			5)		;	rm180
(define	ptsGotResume					8)		;	rm180
(define	ptsSawChesty					1)		;	rm190
(define	ptsTookDaytrotter				12)	;	rm200		new (-3)
(define	ptsTookLimoBottle				6)		;	rm200
(define	ptsToldLimoDriver				8)		;	rm200
(define	ptsTookGreenCard				12)	;	rm250
(define	ptsGotBoardingPass			4)		;	rm258	max 16
(define	ptsPulledSlots					5)		;	rm260
(define	ptsCigaretteMachineQuarters 5)	;	rm260
(define	ptsGotNYNum						1)		;	rm260
(define	ptsStoleQuarter				5)		;	rm270
(define	ptsEnteredLounge				9)		;	rm270
(define	ptsGotGCNum						1)		;	rm270
(define	ptsGotACNum						1)		;	rm270
(define	ptsCalledNYlimo				3)		;	rm280
(define	ptsCalledMlimo					3)		;	rm280
(define	ptsCalledAClimo				3)		;	rm280
(define	ptsCalledGreenCard			7)		;	rm280
(define  ptsGotMNum						1)		;	rm280
(define	ptsUsedBoardingPass			7)		;	rm290
(define	ptsTookMagazine				8)		;	rm320
(define	ptsSavedPlane					100)	;	rm390
(define	ptsBraman						3)		;	rm430
(define	ptsVibman						3)		;	rm430
(define	ptsGotBrassiere				6)		;	rm435
(define	ptsGotFBINum					1)		;	rm440
(define	ptsFartman						3)		;	rm440
(define	ptsGotDataman					5)		;	rm445
(define	ptsGotInfoRB					13)	;	rm445
(define	ptsGotInfoPC					13)	;	rm445
(define	ptsFiredBraAtBigg				100)	;	rm460
(define	ptsPissed						1)		;	rm500
(define	ptsGotLarryTape				3)		;	rm510
(define	ptsGotHyattTape				12)	;	rm510
(define	ptsGotSuperTape				5)		;	rm510
(define	ptsGotTape						4)		;	rm510
(define	ptsCalledChecker				2)		;	rm510
(define	ptsHollerithLaffer			8)		;	rm520
(define	ptsHollerithHyatt				12)	;	rm520
(define	ptsSeesMichelle				3)		;	rm525
(define	ptsTalkedMMintoIt				5)		;	rm535
(define	ptsGaveMMdaytrotter			5)		;	rm535
(define	ptsGaveMMcards					5)		;	rm535
(define	ptsGaveMMcash					5)		;	rm535
(define	ptsHadSexMM						40)	;	rm535
(define	ptsRecordedMM					20)	;	rm535
(define	ptsDatamanSol					6)		;	rm620
(define	ptsFaxSol						6)		;	rm620
(define	ptsSeeOffice					3)		;	rm620
(define	ptsGetRecord					12)	;	rm640
(define	ptsHeard33						3)		;	rm640
(define	ptsHeard33R						3)		;	rm640
(define	ptsHeard78						3)		;	rm640
(define	ptsHeard78R						3)		;	rm640
(define	ptsDidSession					8)		;	rm660
(define	ptsChampagne					18)	;	rm660
(define	ptsZipperSex					10)	;	rm660
(define	ptsTalkSex						16)	;	rm660
(define	ptsGotTapeRB					40)	;	rm660
(define	ptsChangeGirl					2)		;	rm700
(define	ptsDoorman						2)		;	rm700
(define	ptsPlayedPoker					4)		;	rm710
(define	ptsPaidBouncer					12)	;	rm730
(define	ptsWetTeeShirt					8)		;	rm730
(define	ptsHadSexLL						40)	;	rm750
(define	ptsRecordedLL					20)	;	rm750
(define	ptsLarryMeetsLana				6)		;	rm760
(define	ptsPutOnSkates					3)		;	rm760
(define	ptsTalkedToLana				2)		;	rm760
(define	ptsGotSkatesWithMoney		4)		;	rm790
(define	ptsGotSkatesWithCamcorder	8)		;	rm790
(define	ptsReturnedSkates				3)		;	rm790
(define	ptsGotKey						10)	;	rm840
(define	ptsOpenDesk						4)		;	rm840
(define	ptsLookDesk						5)		;	rm840
(define	ptsGetFolder					5)		;	rm840
(define	ptsUnlockDesk					13)	;	rm840
(define	ptsGotLetterOpener			4)		;	rm840
(define	ptsPickLock						5)		;	rm840
(define	ptsMakeCopies					12)	;	rm840
(define	ptsLookFolder					5)		;	rm840
(define	ptsGotByReceptionist			1)		;	rm840
(define	ptsTakeAShower					7)		;	rm850
(define	ptsWoreHammerpants			1)		;	rm870
(define	ptsGetBlankTape				4)		;	rm890
(define	ptsShatteredGlass				15)	;	rm890
(define	ptsHeard2Live2Screw			8)		;	rm890
(define	ptsActivatedRecorder			4)		;	rm890
(define	ptsGetRecordedTape			7)		;	rm890
(define	ptsTookDoily					5)		;	rm905
(define	ptsUsedDoily					17)	;	rm905
(define	ptsCalledDoc					13)	;	rm905
(define	ptsFinishedSurvey				13)	;	rm905
(define	ptsHadSexCC						40)	;	rm910
(define	ptsSawCCtits					2)		;	rm915
(define  ptsUsedGreenCard				15)	;	rm915	new (-3)
(define  ptsTalkedCCIntoIt				5)		;	rm915 new (+5)
(define	ptsRecordedCC					20)	;	rm920
;**	down to here we have:        -----
;(define	TotalPoints					  1000)


(enum 64

;! KEEP THE NEXT FLAG THE FIRST FLAG  !

	pfFirstFlag						;	rm385 uses fpFirstFlag in looping code.
	pfPluggedInCharger			;	charger.sc
	pfPutCorderInCharger 		;	charger.sc
	pfUnpluggedCharger			;	charger.sc
	pfReadMagazine					;	inventry.sc
	pfOpenedFolderMM				;	inventry.sc
	pfOpenedFolderLL				;	inventry.sc
	pfOpenedFolderCC				;	inventry.sc
	pfStartedCamcorder			;  inventry.sc
	pfTapeIntoCamcorder			;  inventry.sc
	pfOpenedDayTrotter			;  inventry.sc
	pfInsertedDataPak				;  inventry.sc
	pfLookedBra						;  inventry.sc
	pfGotDocNum						;  inventry.sc
	pfGotKrapCode					;	inventry.sc
	pfGotCamcorder					;	rm150

	pfDrankWater					;	rm160
	pfSawTitty						;	rm160
	pfTookPot						;	rm160
	pfSterilizedHands				;	rm170
	pfHeard8track					;	rm170
	pfGotCharger					;	rm170
	pfGotVideotapes				;	rm170
	pfDegaussedTapes				;	rm170
	pfGotAeroDorkCard				;	rm180
	pfGotResume						;	rm180
	pfSawChesty						;	rm190
	pfGotNYNum						;	rm260
	pfEnteredLounge				;	rm270
	pfGotGCNum						;	rm270
	pfGotACNum						;	rm270
	pfToldLimoDriver				;	rm200

	pfGotMNum						;	rm280
	pfUsedBoardingPass			;	rm290
	pfBraman							;	rm430
	pfVibman							;	rm430
	pfGotBrassiere					;	rm435
	pfFartman						;	rm440
	pfGotDataman					;	rm445
	pfGotInfoRB						;	rm445
	pfGotInfoPC						;  rm445
	pfPissed							;	rm500
	pfGotLarryTape					;	rm510
	pfGotHyattTape					;	rm510
	pfGotSuperTape					;	rm510
	pfGotTape						;	rm510
	pfCalledChecker				;	rm510
	pfEnteredHollerith			;	rm520

	pfGaveMMdaytrotter			;	rm535
	pfGaveMMcards					;	rm535
	pfGaveMMcash					;	rm535
	pfTalkedMMintoIt				;	rm535
	pfHadSexMM						;	rm535
	pfRecordedMM					;	rm535
	pfDatamanSol					;	rm620
	pfFaxSol							;	rm620
	pfSeeOffice						;	rm620
	pfGetRecord						;	rm640
	pfHeard33						;	rm640
	pfHeard33R						;	rm640
	pfHeard78						;	rm640
	pfHeard78R						;	rm640
	pfDidSession 					;	rm660
	pfChampagne						;	rm660

	pfZipperSex						;	rm660
	pfTalkSex						;	rm660
	pfGotTapeRB						;	rm660
	pfChangeGirl					;	rm700
	pfDoorman						;	rm700
	pfPlayedPoker					;	rm710
	pfPaidBouncer					;	rm730
	pfWetTeeShirt					;	rm730
	pfHadSexLL						;	rm750
	pfRecordedLL					;	rm750
	pfLarryMeetsLana				;	rm760
	pfPutOnSkates					;	rm760
	pfTalkedToLana					;	rm760
	pfGotSkatesWithCamcorder	;	rm790
	pfReturnedSkates				;	rm790
	pfGotSkatesWithMoney			;	rm790

	pfOpenDesk						;	rm840
	pfGetFolder						;	rm840
	pfLookInFolder					;	rm840
	pfUnlockDesk					;	rm840
	pfGotKey							;	rm840
	pfGotLetterOpener				;	rm840
	pfGotByReceptionist  		;	rm840
	pfMakeCopies					;	rm840
	pfTakeAShower					;	rm850
	pfWoreHammerpants				;	rm870
	pfHeard2Live2Screw			;	rm890
	pfActivatedRecorder			;	rm890
	pfGetRecordedTape				;  rm890
	pfShatteredGlass				;	rm890
	pfGetBlankTape					;	rm890
	pfWoreDoily						;	rm905

	pfRemovedDoily					;	rm905
	pfTookDoily						;	rm905
	pfUsedDoily						;	rm905
	pfCalledDoc						;	rm905
	pfFinishedSurvey				;	rm905
	pfHadSexCC						;	rm910
	pfSawCCtits						;	rm915
	pfRecordedCC					;	rm920

;! KEEP THE NEXT FLAG THE LAST FLAG  !

	pfNextFlag						;	rm385 uses fpNextFlag in looping code.

)

